home *** CD-ROM | disk | FTP | other *** search
/ MediaClips: Full Bloom / Aris MediaClips - Full Bloom.iso / mac / Full Bloom™ / Full Bloom™.rsrc / LENS_130_Blackout.bin < prev    next >
Text File  |  1993-05-18  |  750b  |  12 lines

  1. ItemType: WIND
  2. Rect: 0,0,640,480
  3. Style: Window
  4. HasTitleBar: FALSE
  5. HasZoomBox: FALSE
  6. HasCloseBox: TRUE
  7. HasGrowBox: FALSE
  8. MinSize: 100,50
  9. MaxSize: 865,597
  10. Name: Blackout
  11. WhiteColor: 0,0,0
  12. Script: --on windowEvent  wdID,wdName,objNo,objName,objValue┬global bgColor┬if objValue="Open" then ┬  if bgColor ¡ empty then wsSet wdName,0,WhiteColor,bgColor┬  set rect of window wdName to the screenRect┬  send SendToBack to window wdName┬else if objValue="Close" then ┬  ┬else if objValue="Suspend" then ┬  ┬else if objValue="Resume" then ┬  ┬else if objValue="CloseBox" then ┬  ┬else if objValue="ZoomBox" then ┬  ┬else if objValue="GrowBox" then ┬  ┬else if objValue="TitleBar" then ┬  ┬end if┬if objNo ¡ "" then wsSend wdName,0,sendtoback┬--end windowEvent